home *** CD-ROM | disk | FTP | other *** search
/ Mac Format 1994 October / Macformat17.cdr / Shareware City / Sound / juno-librarian-108 / JUNO Librarian 1.0.8 / Sample Scripts / 19 Change DCO PWM LFO⁄MAN < prev    next >
Text File  |  1994-07-11  |  264b  |  13 lines
  1. tell application "JUNO Librarian"
  2.     activate -- if needed
  3.     set x to Parameter 17 of Window "Sample"
  4.     set x to (round (x ÷ 2))
  5.     set x to x * 2
  6.     
  7.     -- select 1 of 2
  8.     --    set x to x + 0 -- LFO
  9.     set x to x + 1 -- MAN
  10.     
  11.     copy x to Parameter 17 of Window "Sample"
  12. end tell
  13.